Very minor bytecomp fix.

* lisp/emacs-lisp/bytecomp.el (byte-compile-report-ops):
Error if not compiled with -DBYTE_CODE_METER.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d86c5668975d21a85927a855238b7858a7e244db..1c7ec32e50ab3832e8d2c959fc22005fc554b401 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2010-09-08  Glenn Morris  <rgm@gnu.org>
 
+       * emacs-lisp/bytecomp.el (byte-compile-report-ops):
+       Error if not compiled with -DBYTE_CODE_METER.
+
        * emacs-lisp/bytecomp.el (byte-recompile-directory):
        Ignore dir-locals-file.
 

diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index b1aa4a32b2598efecafde77a3c9584ee7bd77c08..cb1deb9a762fc86e1dd6f47bbc4133529ee4e39e 100644 (file)
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -4244,6 +4244,8 @@ and corresponding effects."
 
 (defvar byte-code-meter)
 (defun byte-compile-report-ops ()
+  (or (boundp 'byte-metering-on)
+      (error "You must build Emacs with -DBYTE_CODE_METER to use this"))
   (with-output-to-temp-buffer "*Meter*"
     (set-buffer "*Meter*")
     (let ((i 0) n op off)